home *** CD-ROM | disk | FTP | other *** search
/ Atari Mega Archive 1 / Atari Mega Archive - Volume 1.iso / cli / system2.arc / DOUBLE.XSL < prev    next >
Text File  |  1985-11-20  |  210b  |  18 lines
  1. /* Double loop */
  2.  
  3.     set %i=0
  4. . loop1
  5.     set %j=0
  6. . loop2
  7.     echo %i %j > aux:
  8.     echo > aux:
  9.     incr %j
  10.     if equal %j 20
  11.       incr %i
  12.       if equal %i 30
  13.         exit
  14.       endif
  15.       goto loop1
  16.     endif
  17.     goto loop2
  18.